
Lisälaite-PROM ABC 7-2, art.no 64 90140-05 


1. YLEISTÄ 

Lisälaite-PROM 7-2 sisältää ohjausrutiinit I/O-korttien tai sarja- 
liitäntöjen kautta tapahtuvaa kommunikaatiota varten: 

o Erilaisia kirjoittimia varten 
o Asynkronista päätettä varten 

o Teledata-päätettä varten, ainoastaan ABC 800 C (split speed) 

l 

Kanavalla B (V23:) työskennellään 80 merkin lähetys- ja vastaanotto- 
puskurilla, joka on keskeytysohjattu. Edelleen on rutiinit paritee¬ 
tin ja XGN/XOFF-tarki stusta varten. Kun suoritetaan OPEN tai PRE- 
PARE, voidaan tarkistus suorittaa BCDsllä, jotta ei jäädä kiinni 
PRINT ttn:o-käskyyn. Jos DCD:tä ei tavata, saadaan virheilmoitus 42 
(yksikkö ei valmis). 

Seuraavat komennot ja käskyt ovat käytettävissä: 

LIST PR: parainetr i 1 ohko 
LOAD PR:parametri 1 ohko 

PREPARE "PR:parametri lohko" AS FILE no 
OPEN "PR:parametri 1 ohko" AS FILE no 
LIST V24:parametri lohko 
LOAD V24:parametri 1 ohko 

PREPARE "V24:parametri 1 ohko" AS FILE no 
OPEN "V24:parametri 1 ohko" AS FILE no 

Alustettaessa PREPARE-käskyl 1 ä saadaan -form-feed (FF) , ts. uusi sivu 
suljettaessa tiedosto. 

Parametri1 ohko koostuu 11 merkistä yksi kkönimen lisäksi, Parametri- 
1 ohkosta lisää jaksossa 3. Kanava A (merkitty CM. A) avataan nimellä 
PR: ja kanava B (merkitty CH. B) avataan nimellä V24:. 


2. "SPLIT SPEED" 

Muuttamalla näppäimistössä olevan prosessori kortin si 1 tauksia voi¬ 
daan ajaa split speed-muodossa, ts. erilaisilla vastaanotto- ja 
1ähetysnopeuksi11a. 

ABC 800 on siliattu toimitettaessa samalle vastaanotto- ja lähetys¬ 
nopeudelle. Siltaukset SI ja 52 on sijoitettu PU-kortille, näppäi¬ 
mistö! i i t. t i men oikealle puolelle. 


SI 


0--0 0--0 

12 3 4 


$2 

0 

I 

00 ' 0--0 
12 3 4 


/Ä 



2 


Jotta saataisiin split speed-toiminto , on siltaus S2 muutettava seu¬ 
raavasti: S2 

0 

0—0 0--0 0--0 0--0 

1 2 3 A 1 2 3 4 * 

3. PARAMETRILOHKON RAKENNE 

Jos ABC 7-2:ssa määriteltyjä väkioparametreja (default) ei haluta 
käyttää, voidaan yksi tai useampi parametri muuttaa tarviteematta 
kirjoittaa koko lohkoa uudelleen. Jos jokin parametri halutaan muut¬ 
taa näin, kirjoitetaan vain uusi parametri. Muihin paikkoihin kir— 
joitetaan ’ö’. Esimerkki: 

OPEN 'PR:ÖÖÖÖ2ÖÖÖ.ööB' AS FILE no 

Seuraavassa käytetään väki oar voi ssa merkintää de-f (default). Annetut 
arvot pätevät sekä PR:lie että V24:lle. 


merkki, ilmoittaa päätteen tai kirjoittimen tyypin 


K i r j a .i n 

C 

P 

T 

U 

V (def) 
W 


Tyyppi 

Centronies 
SP1 
Pääte 
UART 

V24 simuloitu UART 
Teledata 


(vain PR:) 

(vain PR:) 

(vain V24:) 

(vai n PR:) 

(CH. A tai CH. B) 
(vain V24: ) 


Esim. LIST PR:V 


2.,_merkki. ilmoittaa pariteetin ja XON/XOFF. 


A B C D 
F 6 H I 
E 0 M S 
T U V W 


Ei pariteetin tarkistusta + XON/XOFF 
Pariteetin tarkistus 
Ei pariteetin tarkistusta 
Pariteetin tarkistus + XON/XOFF 


Space 

Mark 

Odd (pariton) 

Even (parillinen) 


Vakioarvona on kirjain S (pariteetti space, ei pariteetin tarkistus 
ta) . 


Esim. 


LIST PR:VS 






ilmoittaa nollien ("NULL") määrän rivinsiirron jälkeen. 


Kirjäi n 

A (de-f) 

B 

C 


Määrä 

O 

x. 

4 


Z 50 

Esim. LIST PR:VSA 


^A-IDSEiHiSi ilmoittaa merkki määrän/r i vl 


Numero 

1 


u 

6 

7 

Esim. 


Määrä 

40 
72 
BO 
120 
132 
158 
254 


LIST PR:VSA3 

misr*' on CRLF:n * ynnytt ‘ v * t 


SsjntdSlil u, " oit ‘ aa r i vi määrän, jonka yli hypätään sivun loppuessa 
(perforointiskippi). 55a 


Numero 

0 

1 

O 

3 

4 

5 

6 (de-f) 

7 

8 
9 


Määrä 

0 

1 

o 

x. 

4 
5' 

6 

7 

8 
9 


Kun ABC 7-2*a käytetään sovellusohjelmissa sisäisen rivi laskuri n 
-urissa, perforointiskippi on asetettava arvoon 0 (nolla). 


Esi m. 


LIST PR:VSA36 
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-------iiiii ilmoittaa kirjoittimen formaatti oh jausmerki t sekä siito- 

tyypin päätekäytössä. 


A E I M 
B F J N 
C G K 0 
D H L P 


CRLF 

CR 

LF 

FF 


M Ei CRLFsää rivin lopussa, ei FF—ei mul oi nti a 

^ "" CRLh : ää rivin lopussa, FF—si mul oi nti 
□ — CRLF rivin lopussa, ei FF—simuloi nti a 
=• - CRLF rivin lopussa, FF-si muioi nti a 

Hai f duplex, jos CR vastaanotetaan, synnytetään LF 

Full duplex, jos CR vastaanotetaan, synnytetään LF 

Hai f duplex, ei ylimääräistä LFsää, jos CR vastaanotetaan 

Full duplex, ei ylimääräistä LF:ää, jos CR vastaanotetaan 

vaunun palautus ja rivinsiirto, 
vaunun palautus (Carriage Return). 
rivinsiirto (Line Feed). 
uusi sivu (Farm Feed). 


Vakioarvona on B (ei CRLFsää rivin lopussa, FF-simulointi kirjoitti- 
melle j a full duplex, ei ylimääräistä LFsää, jos CR vastaanotetaan 


päätetoimi nnossa), 


FF simulointi toimii ainoastaan kirjoittimeen päin. FF-simulointi 
merkitsee sitä, että ABC 800 lähettää joukon LF-koodeja (Line Feed) 
jotta paastaa seuraavalle sivulle. Ei FF-si mul oi nti a merkitsee <-itä 
B00 lähetty FF-koodi n <Fo™ F.„d>, jonka kirloiUn LUen’ 

p- ™ 3 !:? SlirMl ' uuden sivun - CRsn ja LF: n synnyttäminen kat¬ 
kaisee rivin rivin lopussa ilmoitetun rivin pituuden jälkeen. 


Esi m, 


LIST PR:VSA36B 


k ki. ilmoittaa rivimäärän/sivu. 

Tässä iimoitetaan rivien määrä sivua kohti. Voidaan antaa korkein¬ 
taan 99 nvia. Vakioarvon on 72 riviä/sivu, joka vastaan 12":n pape- 
rin korkeutta. K 

HUOri! Määrä on aina annettava kahdella numerolla. 


Esim. 


LISTA PRs VSA36B72 


/ 
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2i_2)gCi!lli!'i ilmoittaa siirtonopeuden (baudrate) . 

Jos ABC 800 sillataan split speed-toimintoa varten, tämä parametri 
ilmoittaa vastaanottonopeuden. Muussa tapauksessa parametri pätee 
sekä lähetys- että vastaanottonopeudel1 e. 

* 

HUOM! Numeroa tulee edeltää piste. 


Numero Nopeus (baud) 


0 

1 


4 

5 (de-f) 

6 

7 

8 


75 
110 
300 
600 
1200 
2400 
4800 
9600 
19200 


Esim. LIST PRjVSA36B72.5 


9 


iQ i ._merkki. ilmoittaa lähetysnopeuden (koskee vain split speed-toi- 
mintoa >. 


Numero 


Nopeus (baud) 


0 

75 

1 

110 

9 

300 

T 

600 

4 

1200 

5 (def) 

2400 

6 

4800 

7 

9600 

8 

19200 


Esim. LIST PR:VSA36B72.55 


.li;_merkki_ä käytetään tarki stamaan, onko kirjoitin kytketty. 

Testi tapahtuu tarkistamalla DCD (nasta 8 liittimessä CH. A ja CH. B 
OPEN- ja PREPARE-käskyi11ä. Jos DCD puuttuu, saadaan virheilmoitus 
42, Yksikkö ei valmis. 


K i r j a i n 


Toi minto 


A (de-f) Älä tarkista DCD: ta 

B Tarkista DCD 


LIST PR:VSA36B72.55A 


Esi m. 
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4. PÄÄTEKÄYTTÖ 


>i daan käyttää päätteenä 


kahdella eri tavalla, kuvaruu- 

kanssa, ks. 


abc SOO.aa voioaan — hdf?ssä basic-ohjelman 

tupäätteena, ks. kohta N-, y 

kohta 4.2. 

4.1 Kuvaruutupääte , 

.. tämä vastaa ADM-3A kuvaruutupää- 
Käytettäessä ABC SOtM sä eäättsens^täm^ ^ ensimmäisen „.rki'n päre- 
tettä. Kun tällaista paatet c _•* Y - T> Muutoin parametri 1 ohko 
metri lohkossa <V24:n jälkeen ^ ifnterf ace, jonka kautta kommuni- 

.i.ynVvv t-lellä olevan mukaise^t^ ^ R ., nasana koostuu 1 aiot- 

SiTrtyininen päätetoi mintoon tapahtuu seuraavasti . 


LOAD V24:TSA30B24.22A 

OPEN "V24 s TSA30B24.22A" AS F ILE 1 
|INPUT # 1 , AS 

OPEN " V24:TSA30B24 .22A" AS F ILE 1 
INPUT LINE #l,A:cf. 

OPEN "V24sTSA30B24.22A" AS F ILE 1 
GET #1,AÖ 

Poistuminen päätetoiminnosta tapahtuu jollakin seuraavista tavoista: 

, t- in;im ,n a inhakin PF-näppäintä (funktionäppäin). Tästä seuraa 
virheilmoitus 53. Jos käytetään basi c-ohjelmaa, virhe voidaan 
käsi teliä virheenkäsittelylla. 

-aasa srs v^rjsssssrjxrast 

käsi teliä virheenkäsittelyllä. 

3. ABC 800 ottaa vastaan STX-kaoä in ^ fl SCI ‘hätkäytettävään 
> jonomuuttu jaan? INPUT «no ja INPUT LIN8 

#no. 

CTRU-S (ASCII-arvo 19) lopettaa tulostuksen kuvaruutuun 
CTRL-Q (ASCI1-arvo 17) aloittaa tulostuksen kuvaruutuun 

CTRL-ij 0 ^ASC11-arvo 8) siirtää kohdistimen askelen vasemmalle 
CTRL-j (ASC!I-arvo 10) siirtää kohdistimen riviä aiemmas 
CTRL-K (ASCII-arvo 11) siirtää kohdistimen riviä ylemmäs 

_ c :i r fää kohdistimen askelen oikealle 

CTRL-L <ASCI I-arvo 12) siirtää koiioisu 

CTRL-Z <ASCII-arvo 26) tyhjentää kuvaruudun ja sijoittaa kohdistimen 
L,hL L s ^cpmnaan yläreunaan 

CTR ,_ 0 (ASC, ,-arvo 30» ^^ta. kohdistimen vasempaan yläreunaan 

UlRL-o (Audi arv tyhjentämättä kuvaruutua 



»ztzrtr- —- 

^n,n, 32 -r? ;}{;•" rivin, o U ^™V- vo «*« ^ 

■M.. U ' n0m - •*r.ii^! J "* Ä 8 C »-^rk?i:Vvf* 

0ft# *-iraavat ASEtt 

h: °hcJisBti men ^ I " merh -it otetaan 

JQ1 ttumi sen r-j Astaan: 27 ai 

c ^ r . ff ? «*« voi öa . n Wy ;; j e, ° —* ih - u “« 

Jakso 2 tokone on siJlatJ teled «ta-päätf« 

l iattava sali f ^ paat -teenä, (L. n<=1 . 

.,. Pilt s Peed-toiminfn kee vain 

kirjoita: toa varten, k:s. 


J a k s o 2. 
kirjoi ta: 

LOfl0 VZ4 --WE«10K24M0A 


^ • *- ^'äa t 6? 

Jos halutaan tuloc-f 

$*»?•• •«««-« >,i ■ . 

«Wkki*; ° °" Jaks °" 3 tai 

Jott SD ol 6 “ ° :n Para- 

niu" n : 0 \ taisil " tarkistaa 

- ^K2 <PESK2(65soo) ^ " —-ttaa: uusi v . r#io 

'"Put-pu.,,^ vold , an HEN Wrh —M. ltt . ly 

P0KE P p|^; 6 s ;Kp^ *"* 80 "* rW,t * seur aavasti f 

OPEN ■ VWWOT (Pu^ ■■ 

«s Pae no ,Pu ='—»>.sw«P, (VflR00 

Rievät merkit tali , USl<ur i»>) 

puskurit,.. - “'«a*" tl», t , 

HU0 "‘ POKE on t . h , . " merf( ki ^PPOmuuttuJaan 

va ennen OPEN-i, 

Input-puskuri n merkkim- Va- 

erf -.ka määrä *arH-♦ 

M ®rkkimäära=p E£X2 ' ’ "' 6, ' aan ssur aavasti: 

ttN-.(65300>+6) 
vapaina olevien , , 

-IPitta maila: ' ' •" -Mr. output-puskuri saatan 

Va °aat-^-< 2 ,P eE2(45300 ^ 4) oki stetaan kir- 

^ytettäess^ GET— 

PRINT-käskynjf j ,ata Pittia a ja y ^ I ® ä ' < 'P' a «n seuraava dat 
1 P-rit.stti bl ? tl f °r^tti on 9 . ur ^«“*P‘tti ; NpuT ftakormaatti: , 

kuraavassa OIevat ^ if 

Sr- - -0,aa , 

Joka Uhatta f 0ll °in kaik?r ' °$° *»"* tavaksi, "f ytetW o 

hx:: 11 a. 



100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
>300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
>'+90 
500 
510 
520 
530 
540 
550 
560 
570 
580 
590 
600 
610 
620 
630 
640 
650 
660 
670 
600 
690 


REM !!!!!!!!!•«!!!! ; Mj!!! j ■ t i i i i i 

REM ! 

REM ! PÄÄTE 

REM ! Esimerkki siitä, kuinka 

REM ! tuleva teksti talletetaan 

REM ! tiedostoon 

REM ! Lopetus PFlsllä 

REM ! <c>LUX0R DATORER AB MOTALA 

REM ! Ver. 1.0 

REM !!!!!!••!!!!! i ; i i i i i t i i i i i i i i i 

EXTEND 

INTEGER 

i 


IF PEEK2 (PEEK2 (655007.) ) < >87. 1 HEN PRINT 'Väärä 1 i säl ai te— PROM 1 ’ 
DIM Buf -f erR= 100007. 

POKE PEEK2 (655007.) +27., VARQOT (Bu-f -f erö) , SWAP7. (VAROOT(Bufferö) ) 
DIM Ti edostonimi8=167. 


PRINT CHRÖ (127.) ’ Pääte Talleta tulevat merkit 

PRINT STRING8 (PEEK (653647) ,617.) 

PRINT CUR(37.,07) 'Talletetaan tiedostoon: 

INPUT ’’Tiedostonimi S 


OPEN ’ V24: VEA30E24.2’ AS F ILE 17. 

PREPARE Ti edostoni mi 8 AS FILE 27. 

Dummyö—FNPos.0 (17.) 

IF PEEK2 (PEEK2 (655007.) +67.) < >07. THEN PRINT FNInchrö; 
IF SYS (57.) =1207. THEN DummySi-FNIrikeySf 
IF ASCI I (Dummyfi) =-1927. THEN 510 ELSE PRINT Dummyö; 
GOTO 430 


CLOSE 17. 
CLOSE 27. 
END 


! Lue merkki V24:stä, kirjoita tiedostoon 

I 

DEF FNInchrfi LOCAL. Dummyi 3 =l 
Dummyö=FNPosö (07.) 

GET #17.,Bufferö 
PIJT #27., Bufferö 

DummyS=CHR8(ASCI I (Bu-fferff) AND 1277.) 
RETURN Dummyö 
FNEND 


Lue merkki näppäimistöltä, kirjoita V24:ään 
DEF FNInkeyH LOCAL DummyP>l 


: GOTO 





700 GET Dummyfi 

710 IF ASCII (Dummyö) =1927. THEN RETURN Dummyö 
720 PRINT #17., Dummyö* 

730 RETURN Dummyö 
740 FNEND 
750 ! 

760 ! 

770 ! 

780 ! 


79u DEF FNPosö (Sammutettu*/.) I.0CAL Muisti*/. 
800 IF PEEK <653647.) =407. THEN 950 
810 ! 

820 ! Kursori 00 merkkiä 

830 ! 


840 

850 

860 

870 

880 

890 

900 

910 

920 

930 

940 


OUT 567., 107. 

OUT 577., 4 07.-327. * Sammut ett u’/. 

Muisti 7.=307207.+P E E K (653637.) *P07.-i-PEEK (65^6^7 > 
OUT 567., 147. % 

OUT 577., SWAP7. (Mui st i 7.> 

OUT 567., 157. 

OUT 577., Mu i st i 7. 

RETURN ’ ’ 

I 

• Kursori 40 merkkiä 


9 


950 

960 

970 


POKE 31 7447.+PEEK (653637.) * 1287.-PEEK 
1 287*SammutettuX 


(653637.) /8*/.*9847.+PEEK 


(653627.) 


» 


RETURN ’’ 


FNEND 






11 o 
120 
J. 30 
140 
150 
160 
170 
180 
190 
200 
210 


REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 


PÄÄTE 

E simer kki siitä, ku i nk a 
tekstitiedosto lähetetään 
Aloita lähetys PF2:lla 
Lopetus PF1: 1 1 ä. 
(c)LUXOR DATORER AD MOTALA 
Ver. 1.0 


REM !!!!!!!•!!!!!!!!!»!!!■ * • i i i i i i 


EXTEND 

INTEGER 


220 

230 

240 


250 IF PEEK2 (PEEK2 (655007.) ) 087. THEN PRINT ’ Väärä 1 i säl ai te-PROM 
260 DI M Buf-f er8=100007. 

270 POKE PEEK2 (655007.)+27., VAROOT(Buffer8) , SWAF'7. (VAROOT (Buf f erS) ) 
280 DIM Ti edostoni mi 8=167. 


i » 


ä90 1 

310 ! 

320 ! 

330 PRINT 
340 PRINT 
350 PRINT 
360 INPUT 


CHRfi(127.) ’ Pääte Lähetä tiedosto V24 

STRI NG.8 (PEEK (653647.) , 617.) 

CUR (37., 07.) ’ Anna lähetettävän tiedoston 

’'Tiedostonimi 8 


llä (CH. 
nimi: ’; 


B) ’ 


f 


370 ! 


3 BO ! 

390 ' 

400 OPEN ’ V24:VEA30E24.2’ AS FILE 17. 

410 OPEN Ti edostoni.mi 8 AS FILE 27. 

420 DummyS=FNPosS (17.) 

430 IF Eof7.=387. OR Start7.=07. THEN 450 

440 IF PEEK2 (PEEK2 (655007.) +47.) < >07. THEN Dummy8=FNPutchr8 
450 IF PEEK2 (PEEK2 (655007.) +67.) < >07. THEN PRINT FNInchrBj 
460 IF SYS (57.) =1207. THEN DummyS=FNInkey8 
470 IF ASCII (Dummyö) =1927. THEN 520 ELSE PRINT DummyBj 
JLBO GOTO 420 
o 

500 ! 

510 1 


520 CLOSE 17. 

530 END 
540 ■ 

550 ' Lue merkki V24:stä 
560 ! 

570 DEF FNInchr8 LOCAL Dummy8=l 
580 Dummy8=FNF'os8 (O7.) 

590 GET #17., Buf f er8 

600 Dummy8=CHR8 (ASCI I (Buf f er8> AND 1277.) 

610 RETURN Dummy8 
620 FNEND 
630 ! 

640 1 Lue merkki näppäimistöltä, kirjoita V24:ään 

650 1 

660 DEF' FNInkeyS LOCAL Dummy8=l 
670 Dummy8=FNF'os8 (07.) 

680 GET Dummy8 

690 IF ASCII (DummyB) =1937. THEN Start7.=17. : RETURN ’’ 


] 


: GOTO 53 











700 

IF Start7.=17. 0R ASCIII (DummyH) «»1927. THEN RETURN DummyH 


710 

PRINT #17., DummyH; 


720 

RETURN DummyH 


730 

FNEND 


740 



750 

! Lähetä tekstitiedosto V24:ään , 


760 



770 

DEF FNPutchrH LOCAL Puskuri$=80 


780 

Dummy.öi=FNPosH (07.) 


790 

ON ERROR GOTO 830 


800 

GET #27., Puskuri ö COUNT PEEK2 (PEEK2 <655007.) +47.)-17. 


810 

PUT #17., Puskuri S 


820 

RETURN ’’ 


830 

CLOSE 27. 


840 

Eof 7.-387. 


850 

5tart7.=07. 


860 

RETURN ’’ 


870 

FNEND 


880 



890 

! Kirjoita kursori 


900 

f 

• 

910 : 

DEF FNPosfi (Sammutettu7.) LOCAL Muisti 7. 


920 

IF PEEK (653647.) =407. THEN 1070 


930 

i 


940 

! Kursori BO merkkiä , 


950 

1 


960 

OUT 567., 107. 


970 

OUT 577., 407.-327. * Sammu t et t u7. 


980 

Mui sti 7.=307207.+PEEK (653637.) *807.+F’EEK (653627.) 


990 

OUT 567., 147. 


1 000 

OUT 577., SWAP7. (Mui st i 7.) 


1010 

OUT 567., 157. 


1020 

OUT 577., Muisti 7. 


1030 

RETURN ’’ 


1040 

i 


1050 

! Kursori 40 merkkiä 


1060 

1 


1070 

POKE 317 4 4 7.+P E E K (653637.) * 1287.-PEEK (653637.) /B7.*9847.+PEEK (653627.) , 


12B7.*S3ammutet tu7. 


1080 

RETURN ’’ 


1090 

FNEND 




66 79210-77 




